#include "SavingSystem.h"
#include "World.h"

uint32 SavingSystemMgr::m_savingCurrentValue = 0;
uint32 SavingSystemMgr::m_savingMaxValueAssigned = 0;
uint32 SavingSystemMgr::m_savingDiffSum = 0;
std::list<uint32> SavingSystemMgr::m_savingSkipList;
ACE_Thread_Mutex SavingSystemMgr::_savingLock;

void SavingSystemMgr::Update(uint32 diff)
{
	if (GetSavingMaxValue() > GetSavingCurrentValue())
	{
		const uint32 step = 120;

		float multiplicator;
		uint32 playerCount = sWorld->GetPlayerCount();
		if (!playerCount)
		{
			m_savingCurrentValue = 0;
			m_savingMaxValueAssigned = 0;
			m_savingDiffSum = 0;
			m_savingSkipList.clear();
			return;
		}

		if (GetSavingMaxValue()-GetSavingCurrentValue() > playerCount+m_savingSkipList.size()) // this should not happen, but just in case
			m_savingMaxValueAssigned = m_savingCurrentValue+playerCount+m_savingSkipList.size();

		if (playerCount <= 1500) // every 2min
			multiplicator = 1000.0f / playerCount;
		else if (playerCount <= 2500) // every 3min
			multiplicator = 1500.0f / playerCount;
		else if (playerCount <= 2750) // every 4min
			multiplicator = 2000.0f / playerCount;
		else if (playerCount <= 3000) // every 6min
			multiplicator = 3000.0f / playerCount;
		else if (playerCount <= 3250) // every 7min
			multiplicator = 3500.0f / playerCount;
		else // every 8min
			multiplicator = 4000.0f / playerCount;

		m_savingDiffSum += diff;
		while (m_savingDiffSum >= (uint32)(step*multiplicator))
		{
			IncreaseSavingCurrentValue(1);

			while (m_savingSkipList.size() && *(m_savingSkipList.begin()) <= GetSavingCurrentValue())
			{
				IncreaseSavingCurrentValue(1);
				m_savingSkipList.pop_front();
			}

			m_savingDiffSum -= (uint32)(step*multiplicator);

			if (GetSavingCurrentValue() > GetSavingMaxValue())
			{
				m_savingDiffSum = 0;
				break;
			}

			if (m_savingDiffSum > 60000)
				m_savingDiffSum = 60000;
		}
	}
}
